home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
EnigmA Amiga Run 1997 February
/
EnigmA AMIGA RUN 15 (1997)(G.R. Edizioni)(IT)[!][issue 1997-02][PLANET CD V].iso
/
enigma
/
earcd
/
sviluppo
/
svilupp2
/
istar.lha
/
Install_Istar
< prev
next >
Wrap
Text File
|
1996-11-06
|
2KB
|
94 lines
;;
;; Install_Istar - Istar installation script for Installer
;;
;; Copyright © Andrew Basden, November 1996
;;
;; Installer and Installer project icon
;; (c) Copyright 1991-93 Commodore-Amiga, Inc. All Rights Reserved.
;; Reproduced and distributed under license from Commodore.
;;
;; INSTALLER SOFTWARE IS PROVIDED "AS-IS" AND SUBJECT TO CHANGE;
;; NO WARRANTIES ARE MADE. ALL USE IS AT YOUR OWN RISK. NO LIABILITY
;; OR RESPONSIBILITY IS ASSUMED.
;;
(set @path
(askdir
(default "work:")
(prompt "Where do you want to install Istar (a new Istar diretory will be created here) ?")
(help @makedir-help)
)
)
(set @dest (tackon @path "Istar"))
(if (NOT (exists @dest)))
(makedir @dest
(infos)
)
(set @dest1 (tackon @dest "KBs"))
(if (NOT (exists @dest1)))
(makedir @dest1
(infos)
)
(set @dest2 (tackon @dest "Docs"))
(if (NOT (exists @dest2)))
(makedir @dest2
(infos)
)
(copyfiles
(prompt "Copy the Istar program and Prefs files?")
(help "This will copy the Istar program")
(source "")
(dest @dest)
(pattern "Istar#?")
(files)
(infos)
(confirm)
)
(copyfiles
(prompt "Copy the Documentation files?")
(help "This will copy the Docs drawer. You should do this.")
(source "docs")
(dest @dest2)
(pattern "#?")
(files)
(infos)
(confirm)
)
(copyfiles
(prompt "Copy the sample knowledge bases?")
(help "This will copy example KBs")
(source "KBs")
(dest @dest1)
(pattern "#?")
(files)
(infos)
(confirm)
)
(copylib
(prompt "Install iff library?")
(help "IFF library reads ILBM but is not essential to Istar.")
(source "iff.library")
(dest "libs:")
(confirm)
)
(set @kbt-assign (cat "assign KBTools: " @dest "\nassign IstarSys: " @dest))
(startup "Istar"
(prompt "KBTools assigns needs to be added to the \"S:user-startup\".")
(help "Not strictly necessary, but avoids annoying requester.")
(command @kbt-assign)
)